Leitura e análise exploratória dos dados

table(df$V1025)


negative positive 
    8251      741 
encod(df$V1025)

   [1] 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0
  [55] 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 1 1
 [109] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 1 1 0 0 0 0 0
 [163] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [217] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [271] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [325] 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 1 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [379] 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [433] 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [487] 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0
 [541] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [595] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0
 [649] 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0
 [703] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0
 [757] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [811] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [865] 0 0 0 0 0 0 0 0 1 1 1 1 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [919] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
 [973] 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0
 [ reached getOption("max.print") -- omitted 7992 entries ]
verify_occor(df,until_column = 1024)

NULL
LS0tCnRpdGxlOiAiVG94aWNpZGFkZSBRU0FSIgpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sKLS0tCgojIyBMZWl0dXJhIGUgYW7DoWxpc2UgZXhwbG9yYXTDs3JpYSBkb3MgZGFkb3MKYGBge3J9CnBhdGggPSAnL2RhZG9zL0dvb2dsZURyaXZlL0RvdXRvcmFkby9BdWxhcy9hbmFsaXNlX211bHRpdmFyaWFkYS9wcm9qZXRvX3RveGljaXR5L2RhdGEvcXNhcl9vcmFsX3RveGljaXR5LmNzdicKZGYgPSByZWFkLmNzdihwYXRoLCBzZXAgPSAnOycsIGhlYWRlciA9IEZBTFNFKQpkZgpgYGAKCgpgYGB7cn0KI0NvbnRhZ2VtIGRlIHF1YW50b3MgY2Fzb3MgcG9zaXRpdm9zIGUgcXVhbnRvcyBjYXNvcyBuZWdhdGl2b3MKdGFibGUoZGYkVjEwMjUpCmBgYAoKYGBge3J9CiNGYXplbmRvIG8gbGFiZWwgZW5jb2RlcgoKZW5jb2QgPC0gZnVuY3Rpb24odmV0KXsKICB2ZXRfZmluYWwgPSByZXAoMCwgbGVuZ3RoKHZldCkpCiAgY250IDwtIDEKICBmb3IgKGkgaW4gdmV0KSB7CiAgICBpZiAoaSA9PSAicG9zaXRpdmUiKSB7CiAgICAgIHZldF9maW5hbFtjbnRdIDwtICAxCiAgICB9CiAgICBjbnQgPC0gY250ICsgMQogIH0KICByZXR1cm4odmV0X2ZpbmFsKQp9Cgp5IDwtIGVuY29kKGRmJFYxMDI1KQoKYGBgCgpgYGB7cn0KI0NvbG9jYW5kbyBvIHkgbm8gZGF0YWZyYW1lCmRmJFkgPC0geQpWaWV3KGRmKQpgYGAKCmBgYHtyfQojVmVyaWZpY2FuZG8gc2UgYWxndW0gZnJhZ21lbnRvIG5hbyB0ZW0gbmVuaHVtYSBvY29ycmVuY2lhCnZlcmlmeV9vY2NvciA8LSBmdW5jdGlvbihkYXRhX2ZyYW1lLCB1bnRpbF9jb2x1bW49MTAyNCl7CiAgY29sc19hbGxfMCA8LSBjKCkKICBmb3IgKG5fY29sIGluIHNlcSgxLGRpbShkYXRhX2ZyYW1lWywxOnVudGlsX2NvbHVtbl0pWzJdKSkgewogICAgCiAgICBzdW1fY29sIDwtIHN1bShkYXRhX2ZyYW1lWyxuX2NvbF0pCiAgICBpZiAoc3VtX2NvbCA9PSAwKXsKICAgICAgY29sc19hbGxfMCA8LSBjYmluZChuX2NvbCkKICAgIH0KICB9CiAgcmV0dXJuKGNvbHNfYWxsXzApCn0KdmVyaWZ5X29jY29yKGRmLHVudGlsX2NvbHVtbiA9IDEwMjQpIAoKIyMgVG9kYXMgb3MgZnJhZ21lbnRvcyB0w6ptIHBlbG8gbWVub3MgMSBvY29ycmVuY2lhLgpgYGAKCmBgYHtyfQoKYGBgCgo=